home *** CD-ROM | disk | FTP | other *** search
/ Komputer for Alle 1999 #5 / 1999 CD 5 (black).iso / Delphi3 / install / data.z / DELPHIMM.INT < prev    next >
Encoding:
Text File  |  1997-08-05  |  839 b   |  37 lines
  1.  
  2. {*******************************************************}
  3. {                                                       }
  4. {       Delphi Runtime Library                          }
  5. {       Memory Manager Unit                             }
  6. {                                                       }
  7. {       Copyright (C) 1997 Borland International        }
  8. {                                                       }
  9. {*******************************************************}
  10.  
  11. library DelphiMM;
  12.  
  13. {$IMAGEBASE $41000000}
  14.  
  15.  
  16. function GetAllocMemCount: Integer;
  17. begin
  18.   Result := AllocMemCount;
  19. end;
  20.  
  21. function GetAllocMemSize: Integer;
  22. begin
  23.   Result := AllocMemSize;
  24. end;
  25.  
  26. exports
  27.   SysGetMem,
  28.   SysFreeMem,
  29.   SysReallocMem,
  30.   GetHeapStatus,
  31.   GetAllocMemCount,
  32.   GetAllocMemSize;
  33.  
  34. begin
  35.   IsMultiThread := True;
  36. end.
  37.